home *** CD-ROM | disk | FTP | other *** search
/ Joy 1: Lollypop / Joy #1: Lollypop.iso / viewer / unixview / xgiftar.z / xgiftar / mc_tables.c < prev    next >
Text File  |  1991-05-20  |  2KB  |  78 lines
  1. /*
  2.  *  From McIDAS Reference Manual
  3.  *     Introduction - pg 21
  4.  *     Table 1, UD-14 9/88,
  5.  *
  6.  * Given the "SS Code" (word three of the area directory)
  7.  *   return a string describing the sensor source.
  8.  *
  9.  */
  10. char *
  11. mc_sensor(sscode)
  12. int sscode ;
  13. {
  14.     switch (sscode) {
  15.     case 0 : return("Non-Image Derived Data") ;
  16.     case 1 : return("Test patterns") ;
  17.     case 2 : return("Graphics") ;
  18.     case 3 : return("Miscellaneous") ;
  19.     case 4 : return("PDUS Meteosat Visible") ;
  20.     case 5 : return("PDUS Meteosat Infrared") ;
  21.     case 6 : return("PDUS Meteosat Water Vapor") ;
  22.     case 7 : return("Radar") ;
  23.     case 8 : return("Miscellaneous Aircraft Data (MAMS)") ;
  24.     case 12 : return("GMS Visible") ;
  25.     case 13 : return("GMS Infrared") ;
  26.     case 14 : return("ATS 6 Visible") ;
  27.     case 15 : return("ATS 6 Infrared") ;
  28.     case 16 : return("SMS-1 Visible") ;
  29.     case 17 : return("SMS-1 Infrared") ;
  30.     case 18 : return("SMS-2 Visible") ;
  31.     case 19 : return("SMS-2 Infrared") ;
  32.     case 20 : return("GOES-1 Visible") ;
  33.     case 21 : return("GOES-1 Infrared") ;
  34.     case 22 : return("GOES-2 Visible") ;
  35.     case 23 : return("GOES-2 Infrared") ;
  36.     case 24 : return("GOES-3 Visible") ;
  37.     case 25 : return("GOES-3 Infrared") ;
  38.     case 26 : return("GOES-4 Visible (VAS)") ;
  39.     case 27 : return("GOES-4 Infrared and Water Vapor (VAS)") ;
  40.     case 28 : return("GOES-5 Visible (VAS)") ;
  41.     case 29 : return("GOES-5 Infrared and Water Vapor (VAS)") ;
  42.     case 30 : return("GOES-6 Visible") ;
  43.     case 31 : return("GOES-6 Infrared") ;
  44.     case 32 : return("GOES-Visible, Block 1 Auxiliary Data") ;
  45.     case 33 : return("GOES-7 Infrared") ;
  46.     case 34 :
  47.     case 36 :
  48.     case 37 :
  49.     case 38 :
  50.     case 39 :
  51.     case 40 : return("NOAA Series Satellites") ;
  52.     case 41 : return("TIROS-N") ;
  53.     case 42 : return("NOAA-6") ;
  54.     case 43 : return("NOAA-7") ;
  55.     case 44 : return("NOAA-8") ;
  56.     case 45 : return("NOAA-9") ;
  57.     case 46 : return("Venus") ;
  58.     case 47 : return("Voyager 1") ;
  59.     case 48 : return("Voyager 2") ;
  60.     case 50 : return("Hubble St.") ;
  61.     case 60 : return("NOAA-10") ;
  62.     case 61 : return("NOAA-11") ;
  63.     case 70 : return("GOES-I (IMAGER)") ;
  64.     case 71 : return("GOES-I (SOUNDER)") ;
  65.     case 72 : return("GOES-J (IMAGER)") ;
  66.     case 73 : return("GOES-J (SOUNDER)") ;
  67.     case 74 : return("GOES-K (IMAGER)") ;
  68.     case 75 : return("GOES-K (SOUNDER)") ;
  69.     case 76 : return("GOES-L (IMAGER)") ;
  70.     case 77 : return("GOES-L (SOUNDER)") ;
  71.     case 78 : return("GOES-M (IMAGER)") ;
  72.     case 79 : return("GOES-M (SOUNDER)") ;
  73.     case 80 : return("ERBE") ;
  74.     case 90 : return("RAW METEOSAT") ;
  75.     }
  76.     return("Unknown") ;
  77. }
  78.